[Common]
Description=ʾǶVBScriptJavaScriptű
HotKeyStart=119
HotKeyStop=122
HotKeyPause=0
Enabled=1
RunOnce=1

[Script]
//ĽűʾڽűʦĽűǶVBScriptJavaScriptű
//涨£
//VBScriptűʹùؼVBSBegin ... VBSEndмĴʾVBSű
//JavaScriptűʹùؼJSBegin ... JSEndмĴʾJSű
//ͨVBSCallVBScript
//ͨJSCallJavaScript
//*****************************************
//űʦԶ庯:
//1, VBSJSһűʦԶ庯úͲϵ
//2, VBSJSĺݲ֧Ϊز
//3, VBSJSĺڲݲɵýűʦĺԶ庯úͲ
//4, VBSJSĺֱӷʽűʦȫֱͨĲֵбĽݡ

main:
var ObjVoice=0
//VBSOpenVoiceúصһSAPI.SpVoice
//ʾصĶ󱣴ڽűʦıObjVoice
set ObjVoice=VBSCall('OpenVoice')
//ʾVBSJSԺͨĺһϵ
do ShowMsg(VBSCall('Add','a','b')+inttostr(JSCall('multiply',10,20)))
//ʾVBSVoiceֵת
//ע⣬ｫ汣ObjVoiceֱΪ
do VBSCall('Voice',ObjVoice,'VBSܺúǿ')
//ʾʹJavaScriptﵽVBSһıתĹ
do JSCall('VoiceJS','Javaܺúǿ')
EndMain

//VBScript
VBSBegin
function OpenVoice()
  set ObjVoice=CreateObject("SAPI.SpVoice")
  set OpenVoice=ObjVoice
End Function
sub Voice(ObjVoice,Str)
  'Set ObjVoice=CreateObject("SAPI.SpVoice")
  'set ObjVoice.Voice=ObjVoice.GetVoices.Item(3)
  ObjVoice.Speak Str
end Sub
function Add(a,b)
  Add=a & b
end function
VBSEnd

//JavaScript
JSBegin
function VoiceJS(str) {
  var ObjVoice=new ActiveXObject('SAPI.SPVoice')
  ObjVoice.Speak(str)
}

function multiply(num1,num2) {
  var total=num1*num2;
  return total;
}
JSEnd
